home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / vbcc / machines / amiga68k / libsrc / math / math_040 / ceil.s < prev    next >
Encoding:
Text File  |  1998-06-24  |  166 b   |  12 lines
  1.     fpu     1
  2.     xdef    _ceil
  3. _ceil
  4.     fmove.l fpcr,d1
  5.     moveq   #48,d0
  6.     or.l    d1,d0
  7.     fmove.l d0,fpcr
  8.     fint.d  4(sp),fp0
  9.     fmove.l d1,fpcr
  10.     rts
  11.  
  12.